﻿Public Class Cls_Mensaje

    Shared Sub MsgInformativo(ByRef img As Anthem.Image, ByRef Lbl_mensaje As Anthem.Label, ByVal pnl As Anthem.Panel, ByVal Mensaje As String)
        Lbl_mensaje.Text = Mensaje
        Lbl_mensaje.UpdateAfterCallBack = True
        pnl.CssClass = "PanelMensaje_informacion  rounded"
        pnl.Visible = True
        img.ImageUrl = "~\imagenes\alert1.png"
        img.UpdateAfterCallBack = True
        pnl.UpdateAfterCallBack = True
        Anthem.Manager.AddScriptForClientSideEval("$('.rounded').corners();")
    End Sub

    Shared Sub MsgError(ByRef img As Anthem.Image, ByRef Lbl_mensaje As Anthem.Label, ByVal pnl As Anthem.Panel, ByVal Mensaje As String)
        Lbl_mensaje.Text = Mensaje
        Lbl_mensaje.UpdateAfterCallBack = True
        pnl.CssClass = "PanelMensaje_error  rounded"
        pnl.Visible = True
        pnl.UpdateAfterCallBack = True

        img.ImageUrl = "~\imagenes\close_32x32.png"
        img.UpdateAfterCallBack = True


        Anthem.Manager.AddScriptForClientSideEval("$('.rounded').corners();")
    End Sub

End Class
